home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / lisp / evaltrac.lha / mf / et12.mf < prev    next >
Text File  |  1989-11-16  |  5KB  |  101 lines
  1. % Evaltrace font for use with 12 point, based on the Computer Modern family.
  2. % See "Visualizing Evaluation in Applicative Languages",
  3. %   by David S. Touretzky and Peter Lee
  4. %
  5. % Copyright 1989 by Peter Lee and David S. Touretzky
  6. % School of Computer Science
  7. % Carnegie Mellon University
  8. %
  9. % Disclaimer:  This font was created by non-experts.
  10. % Please send improvements and bug fixes to:
  11. %   Peter.Lee@cs.cmu.edu   or   David.Touretzky@cs.cmu.edu
  12.  
  13. % The mode should be set before loading this file.
  14.  
  15. if unknown cmbase: input cmbase fi
  16.  
  17. font_identifier:="ET"; font_size 12pt#;
  18.  
  19. % Evaltrace-specific parameters
  20. thick_rule_thickness#:=66/36pt#;    % thickness of thick rules
  21. xarrowhead#:=96/36pt#;    % x displacement for arrowheads
  22. yarrowhead#:=96/36pt#;    % y displacement for arrowheads
  23. vmeet_adj#:=60/36pt#;     % vertical adjustment for rule meets
  24. hmeet_adj#:=21.6/36pt#;     % horizontal adjustment for rule meets
  25.  
  26. % Simply copy the parameter values from cmtt10...
  27. % BUT NOTE:  desc_depth# and fine# are changed.
  28.  
  29. u#:=24.7/36pt#;      % unit width
  30. width_adj#:=0pt#;    % width adjustment for certain characters
  31. serif_fit#:=0pt#;    % extra sidebar near lowercase serifs
  32. cap_serif_fit#:=0pt#;    % extra sidebar near uppercase serifs
  33. letter_fit#:=0pt#;    % extra space added to all sidebars
  34.  
  35. body_height#:=300/36pt#;  % height of tallest characters
  36. asc_height#:=264/36pt#;    % height of lowercase ascenders
  37. cap_height#:=264/36pt#;    % height of caps
  38. fig_height#:=264/36pt#;    % height of numerals
  39. x_height#:=186/36pt#;    % height of lowercase without ascenders
  40. math_axis#:=132/36pt#;    % axis of symmetry for math symbols
  41. bar_height#:=95/36pt#;    % height of crossbar in lowercase e
  42. comma_depth#:=60/36pt#;    % depth of comma below baseline
  43. %desc_depth#:=96/36pt#;    % depth of lowercase descenders
  44. desc_depth#:=144/36pt#;    % depth of lowercase descenders
  45.  
  46. crisp#:=25/36pt#;    % diameter of serif corners
  47. tiny#:=25/36pt#;    % diameter of rounded corners
  48. %fine#:=22/36pt#;    % diameter of sharply rounded corners
  49. fine#:=5/36pt#;    % diameter of sharply rounded corners
  50. thin_join#:=22/36pt#;    % width of extrafine details
  51. hair#:=28/36pt#;    % lowercase hairline breadth
  52. stem#:=28/36pt#;    % lowercase stem breadth
  53. curve#:=28/36pt#;    % lowercase curve breadth
  54. ess#:=25/36pt#;      % breadth in middle of lowercase s
  55. flare#:=35/36pt#;    % diameter of bulbs or breadth of terminals
  56. dot_size#:=39/36pt#;    % diameter of dots
  57. cap_hair#:=28/36pt#;    % uppercase hairline breadth
  58. cap_stem#:=28/36pt#;    % uppercase stem breadth
  59. cap_curve#:=28/36pt#;    % uppercase curve breadth
  60. cap_ess#:=28/36pt#;    % breadth in middle of uppercase s
  61. rule_thickness#:=28/36pt#;  % thickness of lines in math symbols
  62.  
  63. dish#:=0pt#;      % amount erased at top or bottom of serifs
  64. bracket#:=0pt#;      % vertical distance from serif base to tangent
  65. jut#:=39/36pt#;      % protrusion of lowercase serifs
  66. cap_jut#:=39/36pt#;    % protrusion of uppercase serifs
  67. beak_jut#:=0pt#;    % horizontal protrusion of beak serifs
  68. beak#:=39/36pt#;    % vertical protrusion of beak serifs
  69. vair#:=25/36pt#;    % vertical diameter of hairlines
  70. notch_cut#:=28/36pt#;    % maximum breadth above or below notches
  71. bar#:=25/36pt#;      % lowercase bar thickness
  72. slab#:=25/36pt#;    % serif and arm thickness
  73. cap_bar#:=25/36pt#;    % uppercase bar thickness
  74. cap_band#:=25/36pt#;    % uppercase thickness above/below lobes
  75. cap_notch_cut#:=28/36pt#;  % max breadth above/below uppercase notches
  76. serif_drop#:=0pt#;    % vertical drop of sloped serifs
  77. stem_corr#:=0pt#;    % for small refinements of stem breadth
  78. vair_corr#:=0pt#;    % for small refinements of hairline height
  79. apex_corr#:=11/36pt#;    % extra width at diagonal junctions
  80.  
  81. o#:=5/36pt#;      % amount of overshoot for curves
  82. apex_o#:=4/36pt#;    % amount of overshoot for diagonal junctions
  83.  
  84. slant:=0;      % tilt ratio $(\Delta x/\Delta y)$
  85. fudge:=0.86;      % factor applied to weights of heavy characters
  86. math_spread:=-1;    % extra openness of math symbols
  87. superness:=1/sqrt2;    % parameter for superellipses
  88. superpull:=0;      % extra openness inside bowls
  89. beak_darkness:=0;    % fraction of triangle inside beak serifs
  90. ligs:=0;      % level of ligatures to be included
  91.  
  92. square_dots:=false;    % should dots be square?
  93. hefty:=true;      % should we try hard not to be overweight?
  94. serifs:=true;      % should serifs and bulbs be attached?
  95. monospace:=true;    % should all characters have the same width?
  96. variant_g:=false;    % should an italic-style g be used?
  97. low_asterisk:=true;    % should the asterisk be centered at the axis?
  98. math_fitting:=false;    % should math-mode spacing be used?
  99.  
  100. generate et      % switch to the driver file
  101.